Chip 2004 December/2004-12 CHIP.iso/Dom i biuro/AlfaClock 1.71/alfaclock_v1.71.exe/{app}/AlfaClock.exe/0/RCDATA/TFRAMETALKINGCLOCK/TFRAMETALKINGCLOCK.txt

Text File | 2004-10-05 | 6KB | 268 lines

object FrameTalkingClock: TFrameTalkingClock
  Left = 0
  Top = 0
  Width = 509
  Height = 398
  TabOrder = 0
  object GroupBox_Interval: TGroupBox
    Left = 0
    Top = 24
    Width = 450
    Height = 65
    Caption = 'Interval'
    TabOrder = 0
    object LabelX: TLabel
      Left = 224
      Top = 28
      Width = 36
      Height = 13
      Caption = 'minutes'
    end
    object ComboBox_Interval: TComboBox
      Left = 144
      Top = 24
      Width = 73
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
      OnChange = ComboBox_IntervalChange
      Items.Strings = (
        '5'
        '10'
        '15'
        '30'
        '60')
    end
    object CheckBox_Interval: TCheckBox
      Left = 16
      Top = 26
      Width = 121
      Height = 17
      Caption = 'Say the time every'
      Checked = True
      State = cbChecked
      TabOrder = 0
      OnClick = CheckBox_IntervalClick
    end
  end
  object GroupBox_Snooze: TGroupBox
    Left = 0
    Top = 96
    Width = 450
    Height = 65
    Caption = 'Snooze'
    TabOrder = 1
    object Label4: TLabel
      Left = 248
      Top = 28
      Width = 18
      Height = 13
      Caption = 'and'
    end
    object CheckBox_Snooze: TCheckBox
      Left = 16
      Top = 26
      Width = 129
      Height = 17
      Caption = 'Don'#39't speak between'
      Checked = True
      State = cbChecked
      TabOrder = 0
      OnClick = CheckBox_SnoozeClick
    end
    object DateTimePicker1: TDateTimePicker
      Left = 144
      Top = 24
      Width = 97
      Height = 21
      Date = 37378.365285266200000000
      Time = 37378.365285266200000000
      Kind = dtkTime
      TabOrder = 1
      OnChange = DateTimePicker1Change
    end
    object DateTimePicker2: TDateTimePicker
      Left = 272
      Top = 24
      Width = 97
      Height = 21
      Date = 37378.366698981500000000
      Time = 37378.366698981500000000
      Kind = dtkTime
      TabOrder = 2
      OnChange = DateTimePicker2Change
    end
  end
  object GroupBox_WhatToSay: TGroupBox
    Left = 0
    Top = 168
    Width = 450
    Height = 182
    Caption = 'What to say'
    TabOrder = 2
    object Bevel1: TBevel
      Left = 8
      Top = 128
      Width = 433
      Height = 10
      Shape = bsBottomLine
    end
    object CheckBox_Chime: TCheckBox
      Left = 16
      Top = 56
      Width = 137
      Height = 17
      Caption = 'Play chime'
      Checked = True
      State = cbChecked
      TabOrder = 1
      OnClick = CheckBox_ChimeClick
    end
    object CheckBox_Date: TCheckBox
      Left = 16
      Top = 80
      Width = 137
      Height = 17
      Caption = 'Say the date'
      Checked = True
      State = cbChecked
      TabOrder = 3
      OnClick = CheckBox_DateClick
    end
    object CheckBox_Time: TCheckBox
      Left = 16
      Top = 104
      Width = 137
      Height = 17
      Caption = 'Say the time'
      Checked = True
      State = cbChecked
      TabOrder = 6
      OnClick = CheckBox_TimeClick
    end
    object CheckBox_SayOrder: TCheckBox
      Left = 16
      Top = 24
      Width = 345
      Height = 17
      Caption = 'Say the time first, then say the day'
      Checked = True
      State = cbChecked
      TabOrder = 0
      OnClick = CheckBox_SayOrderClick
    end
    object ComboBox_DatePrefix: TComboBox
      Left = 160
      Top = 80
      Width = 129
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 4
      OnChange = ComboBox_DatePrefixChange
      Items.Strings = (
        'On'
        'It is'
        'Today is'
        'The date is')
    end
    object ComboBox_DateFormat: TComboBox
      Left = 288
      Top = 80
      Width = 145
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 5
      OnChange = ComboBox_DateFormatChange
      Items.Strings = (
        'Short date'
        'Medium date'
        'Long date')
    end
    object ComboBox_TimePrefix: TComboBox
      Left = 160
      Top = 104
      Width = 129
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 7
      OnChange = ComboBox_TimePrefixChange
      Items.Strings = (
        'The time is'
        'It is')
    end
    object ComboBox_TimeFormat: TComboBox
      Left = 288
      Top = 104
      Width = 145
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 8
      OnChange = ComboBox_TimeFormatChange
      Items.Strings = (
        '12-hour format'
        '24-hour format'
        'Military format')
    end
    object Button_Test: TButton
      Left = 352
      Top = 146
      Width = 83
      Height = 25
      Caption = 'Test'
      Default = True
      TabOrder = 9
      OnClick = Button_TestClick
    end
    object ComboBox_Chimes: TComboBox
      Left = 160
      Top = 56
      Width = 273
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 2
      OnChange = ComboBox_ChimesChange
    end
  end
  object Panel_Caption: TPanel
    Left = 0
    Top = 0
    Width = 450
    Height = 20
    BevelOuter = bvNone
    TabOrder = 3
    object Shap_Caption: TShape
      Left = 0
      Top = 0
      Width = 450
      Height = 20
      Align = alClient
      Brush.Color = 12937777
    end
    object Label_Caption: TLabel
      Left = 6
      Top = 1
      Width = 81
      Height = 16
      Caption = 'Talking Clock'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object Timer_Talking: TTimer
    OnTimer = Timer_TalkingTimer
    Left = 408
    Top = 40
  end
end